From: Chong Yidong <cyd@stupidchicken.com>
Date: Wed, 27 Jan 2010 03:36:36 +0000 (-0500)
Subject: * lisp/files.el (delete-directory): Fix typo in last change.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~8657
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=fc0439192927113fbec95a32c64f4c4775d006d5;p=emacs.git

* lisp/files.el (delete-directory): Fix typo in last change.
---

diff --git a/lisp/files.el b/lisp/files.el
index bcaba300ae6..d372ff3420a 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4692,8 +4692,8 @@ If RECURSIVE is non-nil, all files in DIRECTORY are deleted as well."
 		    (delete-file file)))
 		;; We do not want to delete "." and "..".
 		(directory-files
-		 directory 'full directory-files-no-dot-files-regexp))
-	(delete-directory-internal directory))))))
+		 directory 'full directory-files-no-dot-files-regexp)))
+      (delete-directory-internal directory)))))
 
 (defun copy-directory (directory newname &optional keep-time parents)
   "Copy DIRECTORY to NEWNAME.  Both args must be strings.